myvar_2 = GlobalObjManager["getNeighborIds"](GlobalObjManager, ObjectManager["kSpeciesFlag_Human"])
{R3},{R4},myvar_5,myvar_6 = ipairs(myvar_2)
for loopvar1, loopvar2 in ipairs(myvar_2) do 
myvar_7 = GlobalObjManager["verifyNeighborId"](GlobalObjManager, myvar_6)
	if (myvar_7 ~= 0) then 
myvar_7 = myvar_7

	
myvar_7 = GlobalObjManager["getNeighborsWithRelationship"]
	myvar_7 = myvar_7(GlobalObjManager, myvar_6)
		if (myvar_7 ~= nil) then
		myvar_8,myvar_9,myvar_10,myvar_11 = ipairs(myvar_7)
		for myvar_10, myvar_11 in myvar_8 do 
	end
end
myvar_12 = GetNeighborRelationship(myvar_6, myvar_11, RelVars["Flags"])
	if (myvar_12 ~= 0) then 
myvar_12 = myvar_12

		if (IsBitSet(myvar_12, RelFlags["BestFriend"]) ~= 1) then 


			if (IsBitSet(myvar_12, RelFlags["Married"]) ~= 0) then 


		else
			myvar_13 = GetNeighborRelationship(myvar_6, myvar_11, RelVars["Flags2"])
				if (myvar_13 ~= False) then
					if (IsBitSet(myvar_13, RelFlags2["BFF"]) == False) then
				else
					myvar_14 = GenericNeighborDataTable["new"](myvar_6, gNeighborDataTableID["Best Friends Forever List"], "Best Friend Forever List")
						if (myvar_14["HasProperty"](myvar_14, myvar_11) == False) then
						GetPrimitiveParameter(0)
						; //SETLISTO
						myvar_14["SetProperty"](myvar_14, myvar_11, {})
						local myvar_19 = "Best Friend Forever List"
						myvar_16 = GenericNeighborDataTable["new"](myvar_11, gNeighborDataTableID["Best Friends Forever List"], myvar_19)
						myvar_14 = myvar_16
						
myvar_16 = myvar_14["SetProperty"]
						myvar_19 = {}
						myvar_16(myvar_14, myvar_6, myvar_19)
					end
				end
			end
		end
	end
end
end
else
	end
	local myvar_4 = True
	SetScriptReturnValue(myvar_4)
